home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Interactive CD Sampler / Microsoft Interactive CD Sampler.iso / DEMOS / BOOKS / BKSHELF.DIR / 00043_sound1wait --.ls < prev    next >
Encoding:
Text File  |  1996-07-19  |  217 b   |  17 lines
  1. global paused
  2.  
  3. on exitFrame
  4.   if paused then
  5.     idle()
  6.     go(the frame)
  7.   else
  8.     idle()
  9.     if not soundBusy(1) then
  10.       waitTill(15)
  11.       go(the frame + 1)
  12.     else
  13.       go(the frame)
  14.     end if
  15.   end if
  16. end
  17.